home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1999 March - Disc 2 / Macworld (1999-03) (Disk 2).dmg / XTensions / Adobe Prepress XTension FREE / Adobe Prepress XTension / Adobe Prepress XTension.rsrc / OSTR_20666_PS_Prolog.txt < prev    next >
Encoding:
Text File  |  1994-10-28  |  2.1 KB  |  78 lines
  1. # (decoded with TMPL 128)
  2. Output String: '
  3. %%BeginProlog
  4. systemdict/currentglobal known systemdict/setglobal known and{/_global currentglobal def false setglobal}if
  5. systemdict/currentpacking known systemdict/setpacking known and{/_packing currentpacking def true setpacking}if
  6. mark
  7. %%BeginResource: procset APX_dict 1.0 2
  8. %%Copyright: Copyright ¬© 1994, Adobe Systems, Inc. All rights reserved.
  9. %%Version: 1.0 2
  10. %%VMusage: 2000 1000
  11. %%VMlocation: local
  12. userdict/APX_dict 15 dict put APX_dict begin
  13. /APX_Setup{
  14.     save APX_dict/b4_Inc_state 3 -1 roll put
  15.     APX_dict/dict_count countdictstack put
  16.     APX_dict/op_count count 2 sub put
  17.     APX_dict/APX_bleedpatch true put
  18.     userdict begin
  19.     /initgraphics{}def
  20.     /initclip{}def
  21.     /initmatrix{}def
  22.     /showpage{}def
  23.     /copypage{}def
  24.     /erasepage{}def
  25.     /settrap{pop}def
  26. }bind def
  27. /APX_Cleanup{
  28.     count APX_dict/op_count get sub{pop}repeat
  29.     countdictstack APX_dict/dict_count get sub{end}repeat
  30.     APX_dict/b4_Inc_state get restore
  31. }bind def
  32.  
  33. /APX_featuresetup{countdictstack mark}bind def
  34. /APX_featurecleanup{stopped{(An APX feature failed.)= flush}if cleartomark countdictstack exch sub dup 0 gt{{end}repeat}{pop}ifelse
  35. }bind def
  36. /APX_screenchange{(Setting screens to: )print print(; )print 2 copy exch(Frequency: )print 32 string cvs print(; )print(Angle: )print =}bind def
  37.  
  38. % Begin bleed patch mechanism for QuarkXPress 3.x
  39. /APX_bleedpatch false def
  40. /*end*/end load def
  41. /end{
  42.     *end*
  43.     APX_dict/APX_bleedpatch get
  44.     { % true...perform bleedpatch
  45.         userdict
  46.         { % forall
  47.             pop 
  48.             dup 
  49.             255 string cvs(QuarkXPress_EPS_3)search
  50.             { % true search
  51.                 pop pop pop 
  52.                 userdict exch get 
  53.                 dup/kp known
  54.                 { % true kp known...no-op kp and close flag
  55.                     /kp{pop}put
  56.                     APX_dict/APX_bleedpatch false put
  57.                 }{ % false kp known
  58.                     pop
  59.                 }ifelse
  60.             }{ % false search
  61.                 pop pop
  62.             }ifelse
  63.         }forall
  64.     }if
  65. }bind def
  66.  
  67. % End bleed patch mechanism for QuarkXPress 3.x
  68.  
  69. end % APX_dict
  70. %%EndResource
  71. cleartomark
  72. systemdict/currentpacking known systemdict/setpacking known and{_packing setpacking}if
  73. systemdict/currentglobal known systemdict/setglobal known and{_global setglobal}if
  74. %%EndProlog
  75.  
  76. %%BeginSetup
  77. %%EndSetup
  78. '